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*********************** 



; ATAP INQ . ASM [ ATA & ATAPI device I/O code draft - ATAPI INQUIRY Command ] 

; Copyright (C) 2002 Erdogan TAN [ 20/11/2002 ] 

; (Based on ATAID . ASM by Erdogan Tan & ATAPI Specification SFF-8020i Rev. 2 

• ************************************************************************* 

; ATA/IDE Command Register Block [ AT Task File ] 



IdeCmdReg_ 


_R_ 


.Data 


equ 


, 


• Data Register 






IdeCmdReg_ 


_w_ 


.Data 


equ 


, 


• Data Register 






IdeCmdReg_ 


_R_ 


.Error 


equ 


1 ( 


• Error Register 






IdeCmdReg_ 


_w_ 


.Feature 


equ 


1 ( 


• Feature Register 






IdeCmdReg_ 


_R_ 


.SectCount 


equ 


2 , 


• Sector Count Register 






IdeCmdReg_ 


_w_ 


.SectCount 


equ 


2 , 


• Sector Count Register 






IdeCmdReg_ 


_R_ 


.Sector 


equ 


3 , 


• Sector Number or LBA Bits 


0-7 




IdeCmdReg_ 


_w_ 


.Sector 


equ 


3 , 


• Sector Number or LBA Bits 


0-7 




IdeCmdReg_ 


_R_ 


.CylinderO 


equ 


4 ( 


• Cylinder Bits 0-7 or LBA 


Bits 


8-15 


IdeCmdReg_ 


_w_ 


.CylinderO 


equ 


4 ( 


• Cylinder Bits 0-7 or LBA 


Bits 


8-15 


IdeCmdReg_ 


_R_ 


.Cylinderl 


equ 


5 , 


• Cylinder Bits 8-15 or LBA 


Bits 


16-23 


IdeCmdReg_ 


_w_ 


.Cylinderl 


equ 


5 , 


• Cylinder Bits 8-15 or LBA 


Bits 


16-23 


IdeCmdReg_ 


_R_ 


.DriveHead 


equ 


6 , 


• Drive & Head Bits or LBA 


Bits 


24-27 


IdeCmdReg_ 


_w_ 


.DriveHead 


equ 


6 , 


• Drive & Head Bits or LBA 


Bits 


24-27 


IdeCmdReg_ 


_R_ 


.Status 


equ 


7 ( 


• Status Register 






IdeCmdReg_ 


_w_ 


.Command 


equ 


7 ( 


• Command Register 






; IDE Status 


Register 


Bits 









IdeCmdReg_ 


_R_ 


.Status. 


_BSY 


equ 


80h ( 


• Bit 


7 


IdeCmdReg_ 


_R_ 


.Status. 


_DRDY 


equ 


40h ( 


• Bit 


6 


IdeCmdReg_ 


_R_ 


.Status. 


_DWF 


equ 


20h ( 


• Bit 


5 


IdeCmdReg_ 


_R_ 


.Status. 


_DSC 


equ 


lOh ( 


• Bit 


4 


IdeCmdReg_ 


_R_ 


.Status. 


_DRQ 


equ 


08h ( 


• Bit 


3 


IdeCmdReg_ 


_R_ 


.Status. 


_CORR 


equ 


04h ( 


• Bit 


2 


IdeCmdReg_ 


_R_ 


.Status. 


_IDX 


equ 


02h ( 


• Bit 


1 


IdeCmdReg_ 


_R_ 


.Status. 


_ERR 


equ 


Olh ( 


• Bit 






; [ ATA Commands ] 

; ATA PACKET INTERFACE Command 

ATAP I_PKT_COMMAND equ 0A0h ; Mandatory 

; ATAPI_IDENTIFY_DRIVE equ OAlh ; Mandatory 

; ATAP I_SOFT_RESET equ 8h ; Mandatory 
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; ATAPI_SERVICE equ A2h ; Optional 

; [ ATAPI Pkt Commands - as a parameter of ATA Command AOh ] 
ATAP I_INQUIRY equ 12h ; Operation Code 

; ATAPI INQUIRY DATA FORMAT 
inquiry_peripheral_device_tyr. 
; Reserved Bits = Bit 5,6,7 c 
inquiry_removable 
inquiry_ANSI_version 
inquiry_ECMA_version 
inquiry_ISO_version 
inquiry_response_dat a_f ormat 
inquiry_ATAP I_version 

Additional Lenght (Bytes) = Byte 4 (Number of bytes following Byte 4) 
Reserved Bytes = Byte 5,6,7 
Vendor Identification = Byte 8 to 15 
Product Identification = Byte 16 to 31 
Product Revision Level = Byte 32 to 35 
Vendor Specific = Byte 36 to 55 
Reserved Bytes = Byte 56 to 95 
Vendor Specific Parameters = Byte 96 to n 

Parameter Offset values Of INQUIRY Data 
addr_inq_peripheral_device_type equ 



equ 


lFh ( 


• Bit 





to 


4 of Byte 


Byte 













equ 


80h ( 


• Bit 


7 


of 


Byte 1 (RMB 


equ 


07h , 


• Bit 





to 


2 of Byte 2 


equ 


38h , 


• Bit 


3 


to 


5 of Byte 2 


equ 


OCOh ( 


• Bit 


6 


& 7 


of Byte 2 


equ 


OFh ( 


• Bit 





to 


3 of Byte 3 


equ 


OFOh ( 


• Bit 


4 


to 


7 of Byte 3 



offset. 


_inq_ 


.removable 


equ 


1 


offset. 


_inq_ 


_st andard_ver 


equ 


2 


offset. 


_inq_ 


_atapi_response 


equ 


3 


offset. 


_inq_ 


_addit ional 


equ 


4 


offset. 


_inq_ 


_vendor_id 


equ 


8 


offset. 


_inq_product_id 


equ 


16 


offset. 


_inq_ 


_product_rev 


equ 


32 


offset. 


_inq_ 


_vendor_spec 


equ 


36 



; PERIPHERAL DEVICE TYPES 

ptype_direct_access_device equ OOh ; (e.g. magnetic disk) 

; ptype_reserved_l equal Olh 

; ptype_reserved_2 equal 02h 

; ptype_reserved_3 equal 03h 

; ptype_reserved_4 equal 4h 

ptype_cdrom_device equ 05h 

; ptype_reserved_6 equal 6h 

ptype_opt ical_memory_device equ 07h 

; Reserved device types = 08h to lEh 

ptype_unknown equ lFh 

Present segment Para 'code' 

assume CS:Present, DS:Present, ES:Present, SS:Present 



;±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±± 

;± 
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± PROCEDURE proc_start 



+ 

±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±± 
proc_start proc far 

org lOOh 

start : 

push ds 
pop es 

mov byte ptr [Command], ATAP I_PKT_COMMAND 

loc_inq_at api_drive : 

call proc_clear_screen 

mov si, offset INQ_Table_Header 
call proc_printmsg 

mov word ptr [Port], lFOh 
mov byte ptr [Drive] , 

mov word ptr [ INQ_T_Port ] , "Fl" ; lFOh 
mov byte ptr [ INQ_T_Drive] , "0" 
call proc_at api_inquiry 

jc short pass_lF0_0 

mov si, offset Msg_PressAnyKey 
call proc_printmsg 

xor ah, ah 
int 16h 



pass_lF0_0 



pass_lF0_l : 



mov byte ptr [Drive] , lOh ; Drive 1 
mov byte ptr [ INQ_T_Drive] , "1" 
call proc_at api_inquiry 

jc short pass_lF0_l 

mov si, offset Msg_PressAnyKey 
call proc_printmsg 

xor ah, ah 
int 16h 



mov word ptr [Port], 170h 
mov byte ptr [Drive] , 

mov word ptr [ INQ_T_Port ] , "71" ; 170h 
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mov byte ptr [ INQ_T_Drive] , "0" 
call proc_at api_inquiry 

jc short pass_170_0 

mov si, offset Msg_PressAnyKey 
call proc_printmsg 

xor ah, ah 
int 16h 

pass_17 0_0 : 

mov byte ptr [Drive] , lOh ; Drive 1 
mov byte ptr [ INQ_T_Drive] , "1" 
call proc_at api_inquiry 

loc_terminate : 

int 20h 

proc_start endp 

proc_at api_inquiry proc near 

mov dx, ideCmdReg_R_St at us 
add dx, word ptr [Port] 

mov cx, OFFFFh 
loc_read_status_reg_l : 

in al, dx 

and al, ideCmdReg_R_Status_BSY 
jz short loc_write_ide_command_l 
loop loc_read_status_reg_l 

jmp short loc_device_is_busy 

loc_write_ide_command_l : 

mov dx, ideCmdReg_W_DriveHead 

add dx, word ptr [Port] 

mov al, byte ptr [Drive] 

or al, OEFh ; Select Drive via Bit 4 

out dx, al 

mov cx, OFFFFh 

mov dx, ideCmdReg_R_St atus 

add dx, word ptr [Port] 

loc_read_status_reg_2 : 

in al, dx 

and al, 80h ; BSY 

jz short loc_write_ide_command_2 

loop loc_read_status_reg_2 

jmp short loc_device_is_busy 
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loc_write_ide_command_2 : 

mov dx, ideCmdReg_W_Command 

add dx, word ptr [Port] 

mov al, byte ptr [Command] 

out dx, al 

mov cx, OFFFFh 

mov dx, ideCmdReg_R_St at us 

add dx, word ptr [Port] 
loc_read_status_reg_3 : 

in al, dx 

test al, 80h ; BSY bit 
jnz short pass_drq_err_check_l 
test al, Olh ; ERR bit 
jnz short loc_at a_ide_io_error 
test al, 08h ; DRQ bit 
jnz short loc_write_command_packet_l 
pass_drq_err_check_l : 

loop loc_read_status_reg_3 
jmp short loc_device_is_bus y 

loc_write_command_packet_l : 

mov dx, ideCmdReg_R_Dat a 

add dx, word ptr [Port] 

mov si, offset Command_Packet_Buf f er 

mov cx, 6 
loc_write_command_packet_la : 

lodsw 

out dx, ax 

loop loc_write_command_packet_la 

mov cx, OFFFFh 
mov dx, ideCmdReg_R_St at us 
add dx, word ptr [Port] 
loc_read_status_reg_4 : 

in al, dx 

test al, 80h ; BSY bit 

jnz short pass_drq_err_check_2 

test al, Olh ; ERR bit 

jnz short loc_at a_ide_io_error 

test al, 08h ; DRQ bit 

jnz short loc_read_dat a_reg_la 

pass_drq_err_check_2 : 

loop loc_read_status_reg_4 

loc_device_is_busy : 

; mov si, Offset Device_is_busy 
; call proc_printmsg 

stc 

retn 
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loc_read_data_reg_la : 

mov dx, ideCmdReg_R_Dat a 
add dx, word ptr [Port] 
mov cx, 48 

mov di, offset Inquiry_Data_Buf f er 
push di 
loc_read_data_reg_lb : 

in ax, dx 
st osw 

loop loc_read_data_reg_lb 
pop si 

mov al, byte ptr [SI] ; Peripheral Device Type at Offset 0. 
and al, inquiry_peripheral_device_type 

call proc_hex ; AL= Input, AX= Output as HEX num characters, 
mov word ptr [INQ_T_PDT], ax 

mov al, byte ptr [SI] [ of f set_inq_removable ] ; at Offset 1. 
and al, inquiry_removable 
jz short pass_RMB_Yes 
mov word ptr [INQ_T_RMB], "EY" 
mov byte ptr [ INQ_T_RMB] +2 , "S" 
jmp short pass_RMB_No 

; This procedure is located here for "Short Jump" 
error : 

mov si, offset IO_Error 
call proc_printmsg 

st c 

retn 

pass_RMB_Yes : 

mov word ptr [INQ_T_RMB], "ON" 
mov byte ptr [ INQ_T_RMB] +2 , 2 Oh 

pass_RMB_No : 

mov al, byte ptr [SI] [of f set_inq_standard_ver] ; at Offset 2. 
push ax 

and al, inquiry_ANSI_version 
add al, 30h 

mov byte ptr [ INQ_T_ANSI_V] , al 
pop ax 
push ax 

and al, inquiry_ECMA_version 
shr al, 1 
shr al, 1 
shr al, 1 
add al, 30h 

mov byte ptr [ INQ_T_ECMA_V] , al 
pop ax 

and al, inquiry_ISO_version 
shr al, 1 

http://www.singlix.org/trdos/atapinq.html (6 of 1 1 ) [3/2/2005 3:42:20 PM] 



loc ata ide io 



ATA & ATA PI [ DISK & CD-ROM DRIVE ] ASSEMBLY PROGRAMMING 

shr al, 1 

shr al, 1 

shr al, 1 

shr al, 1 

shr al, 1 

add al, 30h 

mov byte ptr [ INQ_T_ISO_V] , al 

mov al, byte ptr [SI] [ of f set_inq_at api_response ] ; Offset 3 
push ax 

and al, inquiry_response_data_f ormat 

add al, 30h 

mov byte ptr [INQ_T_RDF], al 

pop ax 

and al, inquiry_ATAPI_version 

shr al, 1 

shr al, 1 

shr al, 1 

shr al, 1 

add al, 30h 

mov byte ptr [ INQ_T_ATAP I_V] , al 

mov al, byte ptr [SI] [of f set_inq_addit ional ] ; at Offset 4. 

mov byte ptr [ INQ_ADDL_Value ] , al 

call proc_hex ; AL= Input, AX= Output as HEX num characters 

mov word ptr [ INQ_T_ADDL] , ax 



push si 

add si, of f set_inq_vendor_id 
mov di, offset INQ_T_VENDOR_ID 
mov cx, 4 
rep movsw 
pop si 
push si 

add si, of f set_inq_product_id 
mov di, offset INQ_T_PRODUCT_ID 
mov cx, 8 
rep movsw 
pop si 
push si 

add si, of f set_inq_product_rev 

mov di, offset INQ_T_PRODUCT_REV 

movsw 

movsw 

pop si 



cmp byte ptr [ INQ_ADDL_Value ] , lFh ; more than 31 bytes ? 

jna short loc_print_INQ_Dat a_Table 

add si, of f set_inq_vendor_spec 

mov di, offset INQ_T_VENDOR_SPEC 

mov cx, 10 

rep movsw 
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mov byte ptr [ INQ_T_VS_Dat a_Ext ] , "V" 
loc_print_INQ_Data_Table : 

mov si, offset INQ_Dat a_Table 
call proc_printmsg 

mov byte ptr [ INQ_T_VS_Dat a_Ext ] , 



clc 



retn 



proc_at api_inquiry endp 
proc_clear_screen proc near 



mov ah, OFh 
int lOh 
mov ah, 
int lOh 



retn 



proc_clear_screen endp 



proc_printmsg 
loc_print : 



proc near 



loc return: 



lodsb 

and 

je 

mov 

mov 

int 



jmp 
retn 



AL, AL 

short loc_return 
AH, OEh 
BX, 07h 
lOh 



short loc_print 



; Load byte at DS:SI to AL 



; If AL = OOh then return 



BIOS Service func ( ah ) = OEh 
Write char as TTY 
AL-char BH-page BL-color 



proc_printmsg endp 



i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i 

From binary (byte) to hexadecimal (character) converter 



input -> AL = byte (binary number) to be converted 
output -> AH = First character of hexadecimal number 
output -> AL = Second character of hexadecimal number 

(c) Erdogan TAN 1998 - 1999 



; 1998 
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proc_hex proc near 

db 0D4h,10h 

or AX, ' 00 ' 

xchg AH, AL 



; 19 9 9 

pass_cc_al : 

pass_cc_ah : 
; 1998 



cmp AL, ' 9 ' 

jna short pass_cc_al 
add AL, 7 

cmp AH, ' 9 ' 

jna short pass_cc_ah 
add AH, 7 



retn 



Undocumented inst . AAM 

AH = AL / lOh 

AL = AL MOD lOh 

Make it ZERO (ASCII) based 



proc_hex 

Command : 
Port : 
Drive : 



endp 

db 
dw 
db 



; ATAPI INQUIRY Command Parameters (Input - Command packet) 
Command_Packet_Buf f er : 
db 12h ; Operation Code 

db 3 dup(0) ; Byte 1 to 3 are Reserved 

db 60h ; BYTE 4 - Allocation Lenght = 96 bytes 

db 7 dup(0) ; Byte 5 to 11 are Reserved 

; ATAPI INQUIRY DATA Buffer 
Inquiry_Dat a_Buf f er : 
db 96 dup(20h) 



Msg_PressAnyKey : 



db ODh, OAh 

db "Press any key to continue 
db ODh, OAh, 



INQ_Table_Header : 

db 7 



INQ_Data_Table 



db ODh, OAh 

db "ATAPI INQUIRY COMMAND OUTPUT 
db ODh, OAh, 

db ODh, OAh 



[ (c) Erdogan Tan 2002 ]" 



http://www.singlix.org/trdos/atapinq.html (9 of 1 1 ) [3/2/2005 3:42:20 PM] 



ATA & ATA PI [ DISK & CD-ROM DRIVE ] ASSEMBLY PROGRAMMING 

db "I/O Port 
db "lFOh" 
db ODh, OAh 
db "Drive 
db "0" 
db ODh, OAh 
db ODh, OAh 

db "Peripheral Device Type 



INQ_T_Port : 



INQ_T_Drive 



INQ_T_PDT : 



INQ_T_RMB : 



INQ_T_ANSI_V: 



INQ_T_ECMA_V: 



INQ_T_ISO_V: 



INQ_T_RDF : 



INQ_T_ATAPI_V: 



INQ_T_ADDL : 



INQ_T_VENDOR_ID : 



db "OOh [ CD-ROM = 05h ] " 

db ODh, OAh 

db "Medium is Removable 

db "YES" 

db ODh, OAh 

db "ANSI Version 

db "0" 

db ODh, OAh 

db "ECMA Version 

db "0" 

db ODh, OAh 

db "ISO Version 

db "0" 

db ODh, OAh 

db "Response Data Format 

db "0" 

db ODh, OAh 

db "Atapi Version 

db "0" 

db ODh, OAh 

db "Additional Lenght 

db "OOh bytes" 

db ODh, OAh 

db "Vendor Identification 

db 8 Dup(2 0h) 

db ODh, OAh 

db "Product Identification 
INQ_T_PRODUCT_ID : 

db 16 Dup(20h) 

db ODh, OAh 

db "Product Revision Level 
INQ_T_PRODUCT_REV : 

db 4 Dup(2 0h) 

db ODh, OAh 
I N Q_T_V S_D a t a_E x t : 

http://www.singlix.org/trdos/atapinq.html (10 of 1 1) [3/2/2005 3:42:20 PM] 



ATA & ATA PI [ DISK & CD-ROM DRIVE ] ASSEMBLY PROGRAMMING 

db ; Will be replaced with "V" if Additional Bytes > lFh. 

db "endor Specific : " 

INQ_T_VENDOR_SPEC : 

db 2 Dup(2 0h) 

db ODh, OAh 

db ODh, OAh 

end_of_table : 

db ODh, OAh, 

INQ_ADDL_Value : 

dw 

; Drive_Is_Not_Ready : 

; db "Drive is not ready ! " 

; db ODh, OAh, 
; Device_Is_Busy : 

; db "Device is busy ! " 

; db ODh, OAh, 



; IO_Error: 



; db "10 Error ! " 
; db ODh, OAh, 



Present 



ends 



end start 



index.html 



)ecs.html 



trdos.html 



Tarkan - KUZU KUZU 



http://www.singlix.org/trdos/atapinq.html (11 of 1 1) [3/2/2005 3:42:20 PM] 



